/*output*/

/*Figure 1*/
twoway (line efcchg year) (line efcchg2 year,lp(dash)) (line efcchg3 year, lp(shortdash)) if provcode==0&year<=2013, xlabel(2000(1)2013, angle(45)) xtitle("Year") ///
legend(label(1 "Measure 1") label(2 "Measure 2") label (3 "Measure 3") cols(3) position(1) ring(0) size(small)) graphregion(fcolor(white)) ///
ytitle("The Intensity of Land Enforcement 2000-2013")

/*Table 1*/
list year nnewfoundvio areanewfoundvio asize if provcode==0 /*provcode 0 means national data*/

/*Table 2*/
reg efcchg drgdp xtc0 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
reg efcchg2 drgdp xtc0 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
reg efcchg3 drgdp xtc0 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)

/*Table 3*/
xi: reg efcchg i.post2006*drgdp i.post2006*i.xtc0 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
xi: reg efcchg2 i.post2006*drgdp i.xtc0*i.post2006 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
xi: reg efcchg3 i.post2006*drgdp i.post2006*xtc0 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)

/*Table A1*/
reg efcchg drgdp xtc0 asize1 viorpt1 lrfisexppc  i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
reg efcchg2 drgdp xtc0 asize1 viorpt1 lrfisexppc i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
reg efcchg3 drgdp xtc0 asize1 viorpt1 lrfisexppc i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)

/*Table A2*/
reg efcchg drgdp xtc0 asize1 viorpt1 lnrgdppc ltpopres lrfisexppc upopratio shsec i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
reg efcchg2 drgdp xtc0 asize1 viorpt1 lnrgdppc ltpopres lrfisexppc upopratio shsec i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
reg efcchg3 drgdp xtc0 asize1 viorpt1 lnrgdppc ltpopres lrfisexppc upopratio shsec i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)

/*Table A3*/
reg oldsh lnewarea drgdp xtc0 asize1 viorpt1 lrfisexppc lnrgdppc ltpopres i.year i.provcode if provcode>0&year<=2013, robust cluster(provcode)
